home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / ES3.ZIP / alias.ini < prev    next >
INI File  |  1997-04-05  |  32KB  |  658 lines
  1. [aliases]
  2. n0=;========================╔vδ« ºó«ipT Version 3.5 By Limbeck777=======================
  3. n1=;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=--=-=-Alias Section=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=--=-=-=-=-=-=
  4. n2=;===================================================================================
  5. n3=sf12 {
  6. n4=  save -p $mircdirbackup\bakpopup.ini
  7. n5=  save -a $mircdirbackup\bakalias.ini
  8. n6=  save -e $mircdirbackup\bakevents.ini
  9. n7=  save -r $mircdirbackup\bakraw.ini
  10. n8=  save -c $mircdirbackup\bakcommands.ini
  11. n9=  save -v $mircdirbackup\bakvariables.ini
  12. n10=  save -u $mircdirbackup\bakusers.ini
  13. n11=  save -p $mircdirpopup.ini
  14. n12=  save -a $mircdiralias.ini
  15. n13=  save -e $mircdirevents.ini
  16. n14=  save -r $mircdirraw.ini
  17. n15=  save -c $mircdircommands.ini
  18. n16=  save -v $mircdirvariables.ini
  19. n17=  save -u $mircdirusers.ini
  20. n18=}
  21. n19=/ops /onotice # 2 $+ $chan $+ 3 Op2Notice2( $opnick(0,#) ) ---->  *1 
  22. n20=/sf2 /say Thank You!!!!!!!
  23. n21=/why /echo 2 -a This is because the command I use for this is: 1:ON TEXT:*:*:/timer877 0 21 clear   the *'s mean that whatever wherever anyone speaks, it will clear the screen in 21 seconds, that also means that the other commands will not work! You may change the 21 to anything. PLEASE goto Auto-Clear then Off to turn this off! or type /acbye
  24. n22=/acbye /.disable #ac | /timer877 Off | ;echo 2 -a Auto-Clear now disabled! :P 
  25. n23=/f5 /part %cj Good-Bye!!!!!!! ╔vδ« ºó«ipT 
  26. n24=/bg { %num = 1 | unset %msg  | %msg =  | %color = p
  27. n25=  :start
  28. n26=  if %color == p { %num2 = 1 | %num3 = 11 | %color = y | goto add }
  29. n27=  if %color == y  { %num2 = 9 | %num3 = 1 | %color = p | goto add }
  30. n28=  :add
  31. n29=  if $mid(%num,1, *1) != $null {
  32. n30=    %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+  $mid(%num, 1,*1) $+   
  33. n31=    inc %num 
  34. n32=  goto start  }
  35. n33=  say %msg
  36. n34=}
  37. n35=/brick { %num = 1 | unset %msg  | %msg =  | %color = p
  38. n36=  :start
  39. n37=  if %color == p { %num2 = 1 | %num3 = 4 | %color = y | goto add }
  40. n38=  if %color == y  { %num2 = 4 | %num3 = 1 | %color = p | goto add }
  41. n39=  :add
  42. n40=  if $mid(%num,1, *1) != $null {
  43. n41=    %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+  $mid(%num, 1,*1) $+   
  44. n42=    inc %num 
  45. n43=  goto start  }
  46. n44=  say %msg
  47. n45=}
  48. n46=/tom {
  49. n47=  /to 
  50. n48=  echo 2 -a 9,1D11,1igital9,1 C11,1lock 
  51. n49=  echo 2 -a 9,1 Tomorrow is:
  52. n50=  .timer980 1 4 echo 2 -a 9,1 %to 
  53. n51=  .timer982 1 5 echo 2 -a 9,1On The Digital Clock 
  54. n52=}
  55. n53=/to {
  56. n54=  if $day = Sunday { /set %to Monday }
  57. n55=  if $day = Monday { /set %to Tuesday }
  58. n56=  if $day = Tueday { /set %to Wednesday }
  59. n57=  if $day = Wednesday { /set %to Thursday }
  60. n58=  if $day = Thursday { /set %to Friday }
  61. n59=  if $day = Friday { /set %to Saturday }
  62. n60=  if $day = Saturday { /set %to Sunday }
  63. n61=}
  64. n62=/rainbow {
  65. n63=  unset %textfinal
  66. n64=  set %rainbow *1
  67. n65=  set %text.change 0
  68. n66=  :beginning
  69. n67=  inc %text.change
  70. n68=  if %text.change > $len(%rainbow) goto end
  71. n69=  set %rand1 $rand(1,15)
  72. n70=  set %text2add  $+ %rand1 $+ $mid(%text.change,1,%rainbow) $+ 
  73. n71=  if (%text.change == 1) { set %textfinal %text2add }
  74. n72=  else set %textfinal %textfinal $+ %text2add
  75. n73=  goto beginning
  76. n74=  :end
  77. n75=  msg $chan %textfinal
  78. n76=}
  79. n77=/ab /timer992 off | /echo 3 -a Auto-Shutdown Aborted!
  80. n78=/aq {
  81. n79=  .timer992 1 $?="How Long until Shutdown? In Seconds" quit $?="Enter Shutdown message" 0,0         .3%logo 
  82. n80=  /echo 3 -a Auto-Shutdown started! Timer set! Type /ab Now to Abort!
  83. n81=  /wavplay autos.wav
  84. n82=}
  85. n83=/f1 /run txedit.exe hints.txt
  86. n84=/sf1 /help
  87. n85=/allp {
  88. n86=  echo 2 -a 9,1There are $opnick(0,#) ops in #
  89. n87=  echo 2 -a 9,1There are $nopnick(0,#) non-ops in #
  90. n88=  echo 2 -a 11,1There is a total of $nick(0,#) people in #
  91. n89=  echo 3 -a 9,1╔vδ« ºó«ipT
  92. n90=}
  93. n91=/channeles {
  94. n92=  /speak Opening Channel Infornation window.
  95. n93=  /echo 3 -a Channel Information Window...
  96. n94=  /channel
  97. n95=}
  98. n96=/clock {
  99. n97=  say 9,1D11,1igital9,1 C11,1lock
  100. n98=  say 9,1 The Time is:
  101. n99=  say 9,1 $atime Here
  102. n100=  say 9,1 On My Clock. 
  103. n101=} 
  104. n102=/eclock {
  105. n103=  echo 1 -a 9,1D11,1igital9,1 C11,1lock
  106. n104=  echo 1 -a 9,1 The Time is:
  107. n105=  echo 1 -a 9,1 $atime Here
  108. n106=  echo 1 -a 9,1 On My Clock. 
  109. n107=}
  110. n108=/etoday {
  111. n109=  echo 1 -a 9,1D11,1igital9,1 D11,1ate 
  112. n110=  echo 1 -a 9,1Date Follows:
  113. n111=  .timer 1 2 echo 3 -a 9,1 $day 
  114. n112=  .timer 1 4 echo 3 -a 9,1 $adate 
  115. n113=} 
  116. n114=/bl { %num = 1 | unset %msg  | %msg =  | %color = p
  117. n115=  :start
  118. n116=  if %color == p { %num2 = 12 | %num3 = 1 | %color = y | goto add }
  119. n117=  if %color == y  { %num2 = 11 | %num3 = 1 | %color = p | goto add }
  120. n118=  :add
  121. n119=  if $mid(%num,1, *1) != $null {
  122. n120=    %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+  $mid(%num, 1,*1) $+   
  123. n121=    inc %num 
  124. n122=  goto start  }
  125. n123=  say %msg
  126. n124=}
  127. n125=/f8 /run txedit.exe %dg
  128. n126=/f7 /wavplay %wg
  129. n127=/feat /run txedit.exe features.txt
  130. n128=/bb /mode %channelb +b %bb
  131. n129=/ak /msg chanserv AKICK %channelb ADD %bb 
  132. n130=/ib /invite %ib %channelc
  133. n131=/f12 /join %channel
  134. n132=/check {
  135. n133=  if (%hit = $null) {
  136. n134=    set %totaljack %card1 + %card2
  137. n135=    msg $nick That adds up to %totaljack
  138. n136=    if (%totaljack = 21) { /msg $nick BlackJack You Win!!!! | /unset %blkjacknnick /unset %blkjacknick | /unset %hit | /unset %card1 | /unset %card2 | /unset %dealer1 | /unset %dealer2 | /unset %card | /unset %totaljack | /unset %ace | /unset %ace2 | /disable #hitstand | /halt }
  139. n137=    msg $nick type !hit to hit and !stand to stand
  140. n138=    set %hit 1
  141. n139=    halt
  142. n140=  }
  143. n141=  set %totaljack %totaljack + %card
  144. n142=  msg $nick that adds up to %totaljack
  145. n143=  if (%totaljack > 21) { /msg $nick You Busted!!! game over | /unset %blkjacknick | /unset %hit | /unset %card1 | /unset %card2 | /unset %dealer1 | /unset %dealer2 | /unset %card | /unset %totaljack | /unset %ace | /unset %ace2 | /disable #hitstand | /halt }
  146. n144=  msg $nick type !hit to hit er !stand to stand
  147. n145=  halt
  148. n146=}
  149. n147=/dealer {
  150. n148=  msg %blkjacknick Dealer Has %dealer1 And %dealer2
  151. n149=  if (%dealer1 = King) /set %dealer1 10
  152. n150=  if (%dealer1 = Queen) /set %dealer1 10
  153. n151=  if (%dealer1 = Jack) /set %dealer1 10
  154. n152=  if (%dealer2 = King) /set %dealer2 10
  155. n153=  if (%dealer2 = Queen) /set %dealer2 10
  156. n154=  if (%dealer2 = Jack) /set %dealer2 10
  157. n155=  if (%dealer1 = Ace) /goto ace
  158. n156=  if (%dealer2 = Ace) /goto ace
  159. n157=  goto start2
  160. n158=  :ace
  161. n159=  if ((%dealer1 = ace) && (%dealer2 <= 10)) { /set %dealer1 11 | /goto start2 }
  162. n160=  if ((%dealer2 = ace) && (%dealer1 <= 10)) { /set %dealer2 11 | /goto start2 }
  163. n161=  if ((%dealer1 = ace) && (%dealer2 = ace)) { /set %dealer1 1 | /set %dealer2 11 | /goto start2 }
  164. n162=  :start2
  165. n163=  set %dealer %dealer1 + %dealer2
  166. n164=  msg %blkjacknick For a total of %dealer
  167. n165=  if ((%dealer >= 17) && (%dealer < 21)) { 
  168. n166=    msg %blkjacknick Dealer stands at %dealer 
  169. n167=    if (%dealer = %totaljack) { /msg %blkjacknick We Tie!! | /goto end }
  170. n168=    if (%dealer > %totaljack) { /msg %blkjacknick You Lose!! | /goto end }
  171. n169=    msg %blkjacknick You Win!!!
  172. n170=    goto end
  173. n171=  }
  174. n172=  if (%dealer < 21) /goto dealme
  175. n173=  if (%dealer > 21) { /msg %blkjacknick I bust You Win!!! | /goto end }
  176. n174=  if (%dealer = 21) {
  177. n175=    msg %blkjacknick dealer has 21!! 
  178. n176=    if (%dealer = %totaljack) { /msg %blkjacknick We Tie!! | /goto end }
  179. n177=    msg %blkjacknick You loose!!!
  180. n178=    goto end
  181. n179=  }
  182. n180=  :start
  183. n181=  if (%dealme = King) /set %dealme 10
  184. n182=  if (%dealme = Queen) /set %dealme 10
  185. n183=  if (%dealme = Jack) /set %dealme 10
  186. n184=  if (%dealme = Ace) /set %dealme 1
  187. n185=  set %dealer %dealer + %dealme
  188. n186=  if ((%dealer >= 17) && (%dealer < 21)) { 
  189. n187=    msg %blkjacknick Dealer stops at %dealer 
  190. n188=    if (%dealer = %totaljack) { /msg %blkjacknick We Tie!! | /goto end }
  191. n189=    if (%dealer > %totaljack) { /msg %blkjacknick You Lose!! | /goto end }
  192. n190=    msg %blkjacknick You Win!!!
  193. n191=    goto end
  194. n192=  }
  195. n193=  if (%dealer < 21) { /msg %blkjacknick Dealer now has %dealer | /goto dealme }
  196. n194=  if (%dealer > 21) { /msg %blkjacknick Dealer now has %dealer | /msg %blkjacknick I bust You Win!!! | /goto end }
  197. n195=  if (%dealer = 21) {
  198. n196=    if (%dealer = %totaljack) { /msg %blkjacknick We Tie!! | /goto end }
  199. n197=    msg %blkjacknick You loose!!!
  200. n198=    goto end
  201. n199=  }
  202. n200=  :dealme
  203. n201=  set %dealme $read blkjack.txt
  204. n202=  msg %blkjacknick dealer draws a %dealme
  205. n203=  goto start
  206. n204=  :end
  207. n205=  unset %blkjacknnick /unset %blkjacknick | /unset %hit | /unset %card1 | /unset %card2 | /unset %dealer1 | /unset %dealer2 | /unset %card | /unset %totaljack | /unset %ace | /unset %ace2 | /disable #hitstand
  208. n206=}
  209. n207=/pos {
  210. n208=  set %ep Possible...
  211. n209=  query %ep  
  212. n210=  echo 3 %ep Possible causes of not have joined your 1st, 2nd, or 3rd favorite channel...  
  213. n211=  echo 2 %ep 1. You might not be connected to a server. Try /server irc.dal.net 7000 to get on DALnet. 
  214. n212=  echo 4 %ep 2. You might be banned from the channel.
  215. n213=  echo 2 %ep 3. You might be Akicked from this channel, similar to banned.
  216. n214=  echo 4 %ep 4. Make sure the listening button is checked in the remotes/variables section. And make sure the join1, join2, or join3 variable(s) are there.
  217. n215=  echo 3 %ep 5. You might be lagged. If you havnt gotten in by now... you probably arent lagged, or are real lagged! Thank You! ╔vδ« ºó«ipT
  218. n216=  unset %ep
  219. n217=}
  220. n218=/voteover {
  221. n219=  disable #vote
  222. n220=  say  $+ $i $+  10Voting Booth Closed!
  223. n221=  say 4Voting Topic:5 %vtopic
  224. n222=  say %vyes Said 10YES
  225. n223=  say %vno Said 10NO
  226. n224=  say %vund Said 10MAYBE
  227. n225=  unset %v*
  228. n226=}
  229. n227=email {
  230. n228=  raw -q privmsg $me :DCC CHAT CHAT 3479502081 25 $+ 
  231. n229=  set %emailaddress $$1
  232. n230=  timer 1 45 /unset %emailaddress
  233. n231=  auser 1001 $me
  234. n232=}
  235. n233=/a10 //speak Cool! I'm 7 years old. | /echo 4 -s Cool. I'm 7.
  236. n234=/a15 //speak Cool, I'm 12. What did ya get on yer last report card? I mean like mainly, what did you get? | /echo 4 -a Cool, I'm 12. What did ya get on yer last report card ( allround )? | /echo 4 -a Type /a if it was mainly A's, B's, or C's, type /d for mainly D's or F's.   
  237. n235=/a //speak Cool Man! A C is average, B is great, and A is very good! Good Job! | /echo 4 -s  Cool Man! A C is average, B is great, and A is very good! Good Job!
  238. n236=/d //speak You should try just a little harder! oh well, maybe next time, eh? | /echo 4 -s  You should try just a little harder! oh well, maybe next time, eh?
  239. n237=/a20 //speak Cool, I'm 17. | /echo 4 -s Cool. I'm 17.
  240. n238=/a40 //speak Cool, I'm 35! | /echo 4 -s Cool. I'm 35!
  241. n239=/a100 //speak Cool, I'm 62. | /echo 4 -s Cool, I'm 62.
  242. n240=/fine {
  243. n241=  //echo -a < $me >3 I'm fine, u? | /speak Well, I'm glad your okay. I'm doing good. So How old are ya? | /echo 4 -s Well, I'm glad your okay. I'm doing good. So How old are ya? 
  244. n242=  | /echo 3 -a Type /a10 if yer between 1 and 10 years old, type /a15 if yer between 10-15, type /a20 if your between 15-20, /a40 if yer between 20-40, or /a100 if yer between 40 and 100 years old. | /.timer 1 7 3 -a Anytime type /gbye to say Good-Bye!!!!!!! :)
  245. n243=}
  246. n244=/soso //speak Oh well, maybe tomorrow! | /echo 4 -s Oh well, maybe tomorrow. 
  247. n245=/bad //speak Oh well, there's always tomorrow! | /echo 4 -s Oh well, there's always tomorrow!!
  248. n246=/gbye //speak Good-Bye! Nice talkin to ya! Laters! | /echo 4 -s Good-Bye! Nice talkin to ya! Laters!
  249. n247=/colh /echo -a Here are the Colors in mIRC 4.7+: 0,1White(0) 1Black(1) 2Dark blue(2) 3Green(3) 4Red(4) 5Brown(5) 6Purple(6) 7Orange(7) 8,Yellow(8) 9Light Green(9) 10Teal(10) 11Light Blue(11) 12Blue(12) 13Light Purple(13) 14Dark Grey(14) 15Light Grey(15) If you cant see these, type /colorb
  250. n248=/colorb /echo -a Here are the Colors with a black/white backround: 0,1White(0) 1,0Black(1) 2,0Dark blue(2) 3,0Green(3) 4,1Red(4) 5,0Brown(5) 6,0Purple(6) 7,1Orange(7) 8,1Yellow(8) 9,1Light Green(9) 10,0Teal(10) 11,1Light Blue(11) 12Blue(12) 13,1Light Purple(13) 14,0Dark Grey(14) 15,1Light Grey(15) 
  251. n249=/fchan {
  252. n250=  join $$1 $+ $chr(160) $+ @ $+ $$2
  253. n251=}
  254. n252=/ghost {
  255. n253=  join $$1 $+ $chr(160)
  256. n254=}
  257. n255=/nicker /nick $r(A,Z) $+ $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(A,Z) $+ $r(a,z) $+ $r(0,9) $+ $r(0,9) $+ $r(a,z) $+ $r(A,Z) $+ $r(1,9)
  258. n256=/nickflood {
  259. n257=  set %me $me
  260. n258=  timer 15 3 nicker
  261. n259=  timer 1 50 nick %menick
  262. n260=}
  263. n261=bac {
  264. n262=  unset %final
  265. n263=  unset %endreverse
  266. n264=  set %sections $token(0,32,*1)
  267. n265=  :revstart
  268. n266=  if (%sections == 0) goto revend  
  269. n267=  set %reverseme $token(%sections,32,*1)
  270. n268=  set %length $len(%reverseme)
  271. n269=  set %backtext $mid(%length,1,%reverseme)  
  272. n270=  dec %length 1  
  273. n271=  :backstart
  274. n272=  if (%length == 0) goto backend
  275. n273=  set %tempback $mid(%length,1,%reverseme)
  276. n274=  set %backtext %backtext $+ %tempback 
  277. n275=  dec %length 1
  278. n276=  goto backstart
  279. n277=  :backend
  280. n278=  set %reversed_text %backtext
  281. n279=  set %temp %reversed_text
  282. n280=  set %final %final %temp
  283. n281=  dec %sections 1
  284. n282=  goto revstart  
  285. n283=  :revend
  286. n284=  set %endreverse %final
  287. n285=  say %final
  288. n286=}
  289. n287=ece {
  290. n288=  %c = *1
  291. n289=  set %c $replace(%c,a,4a)
  292. n290=  set %c $replace(%c,b,3B)
  293. n291=  set %c $replace(%c,c,6C) 
  294. n292=  set %c $replace(%c,d,7D) 
  295. n293=  set %c $replace(%c,e,4e) 
  296. n294=  set %c $replace(%c,f,12F) 
  297. n295=  set %c $replace(%c,g,13G) 
  298. n296=  set %c $replace(%c,h,6H) 
  299. n297=  set %c $replace(%c,i,4i) 
  300. n298=  set %c $replace(%c,j,J) 
  301. n299=  set %c $replace(%c,k,3K) 
  302. n300=  set %c $replace(%c,l,L) 
  303. n301=  set %c $replace(%c,m,4M) 
  304. n302=  set %c $replace(%c,n,6N)
  305. n303=  set %c $replace(%c,o,4o) 
  306. n304=  set %c $replace(%c,p,12P) 
  307. n305=  set %c $replace(%c,q,Q) 
  308. n306=  set %c $replace(%c,r,13R) 
  309. n307=  set %c $replace(%c,s,7S) 
  310. n308=  set %c $replace(%c,t,T) 
  311. n309=  set %c $replace(%c,u,4u) 
  312. n310=  set %c $replace(%c,v,V) 
  313. n311=  set %c $replace(%c,w,12W) 
  314. n312=  set %c $replace(%c,x,7X) 
  315. n313=  set %c $replace(%c,y,Y) 
  316. n314=  set %c $replace(%c,z,6z) 
  317. n315=  set %c $replace(%c,?,12┐15?) 
  318. n316=  say %c
  319. n317=  unset %c
  320. n318=}
  321. n319=ht {
  322. n320=  set %rk *1
  323. n321=  %rk = $replace(%rk,a,1σ)
  324. n322=  %rk = $replace(%rk,b,2▀)
  325. n323=  %rk = $replace(%rk,c,3⌐)
  326. n324=  %rk = $replace(%rk,d,4╨)
  327. n325=  %rk = $replace(%rk,e,5δ)
  328. n326=  %rk = $replace(%rk,f,6â)
  329. n327=  %rk = $replace(%rk,g,7g)
  330. n328=  %rk = $replace(%rk,h,10H)
  331. n329=  %rk = $replace(%rk,i,9ε)
  332. n330=  %rk = $replace(%rk,j,10j)
  333. n331=  %rk = $replace(%rk,k,10k)
  334. n332=  %rk = $replace(%rk,l,12ú)
  335. n333=  %rk = $replace(%rk,m,13m)
  336. n334=  %rk = $replace(%rk,n,14±)
  337. n335=  %rk = $replace(%rk,o,15°)
  338. n336=  %rk = $replace(%rk,p,14╢)
  339. n337=  %rk = $replace(%rk,q,13q)
  340. n338=  %rk = $replace(%rk,r,12«)
  341. n339=  %rk = $replace(%rk,s,10º)
  342. n340=  %rk = $replace(%rk,t,10t)
  343. n341=  %rk = $replace(%rk,u,9ⁿ)
  344. n342=  %rk = $replace(%rk,v,8v)
  345. n343=  %rk = $replace(%rk,w,7W)
  346. n344=  %rk = $replace(%rk,x,6╫)
  347. n345=  %rk = $replace(%rk,y,5Ñ)
  348. n346=  %rk = $replace(%rk,z,4z)
  349. n347=  %rk = $replace(%rk,?,3┐)
  350. n348=  say %rk
  351. n349=  unset %rk
  352. n350=}
  353. n351=/f4 /ignore *!*@* | /timer3 0 15 /echo *** Everyone is being ignored Hit F3 to undo. | /echo *** Everyone is being ignored Hit F3 to undo.
  354. n352=/f3 /ignore -r *!*@* | /timer3 off
  355. n353=/a78 /auser 78 $1 | /guser 78 $1
  356. n354=/a5 /auser 5 $1 | /guser 5 $1
  357. n355=/speakme /enable #speak Type speakmeo for off this!!!!!!!
  358. n356=/speakmeo /disable #speak
  359. n357=/mesee /enable #titlespeak | /titlebar Type /meseeo for off this! Or speakme to have it talk to you!
  360. n358=/meseeo /disable #titlespeak | /titlebar $me is on mIRC 4.72
  361. n359=/faq /run mircfaq.hlp
  362. n360=/day /speak The day of the week is $day and the time is $atime
  363. n361=/f2 /clear
  364. n362=/ctc {
  365. n363=  %c = *1
  366. n364=  set %c $replace(%c,a,4a)
  367. n365=  set %c $replace(%c,b,3B)
  368. n366=  set %c $replace(%c,c,6C) 
  369. n367=  set %c $replace(%c,d,7D) 
  370. n368=  set %c $replace(%c,e,4e) 
  371. n369=  set %c $replace(%c,f,12F) 
  372. n370=  set %c $replace(%c,g,13G) 
  373. n371=  set %c $replace(%c,h,6H) 
  374. n372=  set %c $replace(%c,i,4i) 
  375. n373=  set %c $replace(%c,j,J) 
  376. n374=  set %c $replace(%c,k,3K) 
  377. n375=  set %c $replace(%c,l,L) 
  378. n376=  set %c $replace(%c,m,4M) 
  379. n377=  set %c $replace(%c,n,6N)
  380. n378=  set %c $replace(%c,o,4o) 
  381. n379=  set %c $replace(%c,p,12P) 
  382. n380=  set %c $replace(%c,q,Q) 
  383. n381=  set %c $replace(%c,r,13R) 
  384. n382=  set %c $replace(%c,s,7S) 
  385. n383=  set %c $replace(%c,t,T) 
  386. n384=  set %c $replace(%c,u,4u) 
  387. n385=  set %c $replace(%c,v,V) 
  388. n386=  set %c $replace(%c,w,12W) 
  389. n387=  set %c $replace(%c,x,7X) 
  390. n388=  set %c $replace(%c,y,Y) 
  391. n389=  set %c $replace(%c,z,6z) 
  392. n390=  set %c $replace(%c,?,12┐15?) 
  393. n391=  say %c
  394. n392=  unset %c  
  395. n393=}
  396. n394=/time /speak the current time is $atime
  397. n395=/colorme /say The following is NOT an advirtisment, it is to help you!!!!!!! | /timer7 1 1 msg $chan How do you do...    Underline? | /timer14 1 3 msg $chan How 'bout Bold? | /timer15 1 7 msg $chan Or reverse? | /timer16 1 21 msg $chan 4How does 2c3o4l5o7r? 5Sound to you? | /timer17 1 14 msg $chan If you would like to know how to do this, type howdo 4,5NOW!!!!!!! | /timer19 1 25 msg $chan Type it!!!!!!! :)
  398. n396=ctext { 
  399. n397=  unset %ctext*
  400. n398=  set %loop 0
  401. n399=  set %ctext *1
  402. n400=  :1
  403. n401=  inc %loop 1
  404. n402=  if ($mid(%loop,1,%ctext) == $chr(32)) { %ctext2 = %ctext2 $+ $chr(160) | goto 1 }
  405. n403=  %ctext1 =  $+ $rand(1,13) $+ $mid(%loop,1,%ctext)
  406. n404=  if (%ctext2 == $null) { %ctext2 = %ctext1 }
  407. n405=  else { %ctext2 = %ctext2 $+ %ctext1 }
  408. n406=  ;echo -s .. %ctext4
  409. n407=  if (%loop => $len(%ctext)) { say %ctext2 | unset %ctext* | unset %loop | halt }
  410. n408=  goto 1
  411. n409=} 
  412. n410=/current { 
  413. n411=  set %ec  ╔vδ«_ºó«ipT
  414. n412=  query %ec
  415. n413=  echo 3 %ec Currently your ╔vδ« ºó«ipT Stats for Enables/Disables are...
  416. n414=  echo 2 %ec Color Ban is %col
  417. n415=  echo 2 %ec Revolving Door Ban is %rd
  418. n416=  echo 2 %ec CTCP Protection is %cp
  419. n417=  echo 2 %ec ON TEXT Protection is %ot
  420. n418=  echo 2 %ec ON NICK Protection is %np
  421. n419=  echo 2 %ec ON Action Protection is %at
  422. n420=  echo 2 %ec Op Beg Protection is %o  
  423. n421=  echo 2 %ec Auto-greet is %ag
  424. n422=  echo 2 %ec Snackbar is %snackbar
  425. n423=  echo 2 %ec Swearkick is %swear
  426. n424=  echo 2 %ec Titlespeak is %title
  427. n425=  echo 2 %ec Friend protection is %friend
  428. n426=  echo 2 %ec Speak All is %speak
  429. n427=  echo 2 %ec BlackJack is %bj
  430. n428=  echo 2 %ec Auto-Ping is %ap
  431. n429=  echo 2 %ec 0,0         .End of Current Stats On enables/disables 
  432. n430=  /echo 2 %ec These options may be found in the Some Settings menu and the Enables/Disables Menu! :)
  433. n431=}
  434. n432=/toff /unset %topic | /echo 3 -a TopicLock is no longer set! :)
  435. n433=/moff /unset %mode | /echo 3 -a ModeLock is no longer set! :)
  436. n434=/start { 
  437. n435=  run uraspec.exe
  438. n436=  play -c Status title21.txt 70
  439. n437=  if %mine == $null { /set %mine $$?="Please Enter your E-Mail Address." }
  440. n438=  /.load -u $mIRCDirusers.ini
  441. n439=  /.load -e $mIRCDirevents.ini
  442. n440=  /.load -a $mIRCDiralias.ini
  443. n441=  /.load -c $mIRCDircommands.ini
  444. n442=  /.load -v $mIRCDirvariables.ini
  445. n443=  /.load -r $mIRCDirraw.in
  446. n444=}
  447. n445=/startwall {
  448. n446=  ame 3has14 [Enabled] 2the3 [Message Wall!]4 Type !rwall to view what is on the wall already! Type !wwall and a message to Write something to the Wall!! 3 %logo
  449. n447=  .timer777 0 221  ame 3has14 [Enabled] 2the 3[Message Wall!]4 Type !rwall to view what is on the wall already! Type !wwall and a message to Write something to the Wall!! 3 %logo
  450. n448=}
  451. n449=/stopwall {
  452. n450=  /timer777 off | /ame 3has14 [Disabled] the3 [Message Wall!]3 :) %logo
  453. n451=}
  454. n452=/c /say Cool!
  455. n453=/time /ctcp $?="Enter nick to time" time
  456. n454=fchan {
  457. n455=  join $$1 $+ $chr(160) $+ @ $+ $$2
  458. n456=}
  459. n457=/dop /mode # -ooo $$1 $2 $3
  460. n458=/j /join #$$1
  461. n459=/p /part #
  462. n460=/n /names #$$1
  463. n461=ghost {
  464. n462=  join $$1 $+ $chr(160)
  465. n463=}
  466. n464=MassDeop { 
  467. n465=  %deopvar = 0 
  468. n466=  %deopnicks = "" 
  469. n467=  :next 
  470. n468=  inc %deopvar 1 
  471. n469=  if ($opnick(%deopvar,$$1) == $me) { goto next } 
  472. n470=  if ($opnick(%deopvar,$$1) == $null) { 
  473. n471=    if ($len(%deopnicks) > 0) { mode # -oooo %deopnicks }
  474. n472=    goto done 
  475. n473=  } 
  476. n474=  %deopnicks = %deopnicks $opnick(%deopvar,$$1) 
  477. n475=  if (4 // %deopvar) { mode # -oooo %deopnicks | %deopnicks = "" } 
  478. n476=  goto next 
  479. n477=  :done 
  480. n478=}
  481. n479=MassKick { 
  482. n480=  set %kick.var 1 
  483. n481=  :next 
  484. n482=  if ($nick(%kick.var,$$1) == $null) { goto done } 
  485. n483=  if ($nick(%kick.var,$$1) == $me) { inc %kick.var 1 | goto next } 
  486. n484=  kick $$1 $nick(%kick.var,$$1) Mass Kick of $$1 
  487. n485=  inc %kick.var 1 
  488. n486=  goto next 
  489. n487=  :done 
  490. n488=}
  491. n489=MassMsg { 
  492. n490=  set %msg.var 1 
  493. n491=  set %mass.msg $$?="Enter Your Msg:" 
  494. n492=  :next 
  495. n493=  if ($nick(%msg.var,$$1) == $null) { goto done } 
  496. n494=  if ($nick(%msg.var,$$1) == $me) { inc %msg.var 1 | goto next } 
  497. n495=  msg $nick(%msg.var,$$1) [TSG] [Mass Msg] %mass.msg (Replies will be burnt!) 
  498. n496=  inc %msg.var 1 
  499. n497=  goto next 
  500. n498=  :done 
  501. n499=}
  502. n500=/ping /ctcp $$1 ping
  503. n501=/page /ctcp $$1 page
  504. n502=/op /mode # +o $1 
  505. n503=/dop /mode # -o $1
  506. n504=/cc /say 5,8c7,9o2,4l4,8o7,8r is 2COOL
  507. n505=/j /join #$$1
  508. n506=/p /part #
  509. n507=/n /names #$$1 
  510. n508=/w /whois $$1
  511. n509=/k /kick # $$1
  512. n510=/count  /msg $chan There are a total of $nick(0,#) people in this channel. [ $+ $opnick(0,#)  OP'ed/ $+ $nopnick(0,#)  Not OP'ed]
  513. n511=/q /query $$1
  514. n512=/hop /part # | /join #$$1
  515. n513=/send /dcc send $1 $2
  516. n514=/chat /dcc chat $1
  517. n515=/ping /ctcp $$1 ping
  518. n516=/f2 /clear
  519. n517=/faq /run mircfaq.hlp mircFAQ.hlp
  520. n518=atime { 
  521. n519=  set %atime $gettok($time,1,58)
  522. n520=  if (%atime >= 13) { %atime = %atime - 12 | return %atime $+ : $+ $gettok($time,2,58) $+ pm }
  523. n521=  else if (%atime == 12) { return %atime $+ : $+ $gettok($time,2,58) $+ pm }
  524. n522=  else if (%atime == 0) { %atime = %atime + 12 | return %atime $+ : $+ $gettok($time,2,58) $+ am }
  525. n523=  else { return %atime $+ : $+ $gettok($time,2,58) $+ am }
  526. n524=}
  527. n525=join {
  528. n526=  if ($1 == $NULL) || $POS($1,$CHR(42)) {
  529. n527=    echo 4 -a Sorry, ya typed it a little wrong... Try: /join <channel>  Without the <>'s ╔vδ« ºó«ipT By Limbeck777
  530. n528=  }
  531. n529=  else {
  532. n530=    echo 4 -a Now attemping to join $$1 $+  Please stand by....      ╔vδ« ºó«ipT By Limbeck777
  533. n531=    join $$1
  534. n532=  }
  535. n533=}
  536. n534=invite {
  537. n535=  if ($1 == $NULL) || ($2 == $NULL) || $POS($1,$CHR(42)) {
  538. n536=    echo 5 -a oops, try: /invite <nick> <channel>   course with no <>'s   ╔vδ« ºó«ipT
  539. n537=  }
  540. n538=  else { 
  541. n539=    invite $$1 $$2
  542. n540=  }
  543. n541=}
  544. n542=whois {
  545. n543=  if ($1 == $NULL) || $POS($1,$CHR(42)) {
  546. n544=    echo 5 -a Try: /whois <nick>  without the <>'s though! And you forgot to put a nickname!! :)   ╔vδ« ºó«ipT
  547. n545=  }
  548. n546=  else { 
  549. n547=    whois $$1
  550. n548=  }
  551. n549=}
  552. n550=me {
  553. n551=  if ($1 == $NULL) {
  554. n552=    echo 5 -a Try: /me <text> without <>'s ╔vδ« ºó«ipT
  555. n553=  }
  556. n554=  else {
  557. n555=    me *1
  558. n556=  }
  559. n557=}
  560. n558=nick {
  561. n559=  if ($1 == $NULL) { echo 4 -a  Usage: /nick <newnick>  without the <>'s ╔vδ« ºó«ipT | halt }
  562. n560=  else goto next
  563. n561=  :next
  564. n562=  nick $$1
  565. n563=  halt
  566. n564=}
  567. n565=ton { timer2001 0 1 /seconds | %days = 0 | %hours = 0 | %minutes = 0 | %seconds = 0 }
  568. n566=seconds { 
  569. n567=  inc %seconds 1 | titlebar ╔vδ« ºó«ipT v3.0, you've been online: %days Days, %hours Hours, %minutes Minutes, and %seconds Seconds! :)
  570. n568=  if (%seconds = 60) { %seconds = 0 | inc %minutes 1 }
  571. n569=  if (%minutes = 60) { %minutes = 0 | inc %hours 1 | thl }
  572. n570=  if (%hours > 24) { %hours = 0 | inc %days 1 }
  573. n571=}
  574. n572=tno { timer2001 off | /titlebar ╔vδ« ºó«ipT Version 3.0 By Limbeck777 }
  575. n573=thl { ame 3Hi, I have been on mIRC %days Days, %hours Hours, %minutes minutes, and %seconds Seconds!!! %logo | return 1 }
  576. n574=/trivia /speak Welcome to the Ever Script Trivia Game! Choose a subject, the subjects will be posted in green and blue: | /echo 3 -a Choose a subject, type / and the letter to start: 2X) 3Ever Script,2 Y) 3mIRC, | /echo 3 -a or 2 Z) 2#mIRC_Scripts on DALnet   
  577. n575=/ae /echo 3 -a Example: 2/x113 would indicate that you think number 1 is the correct answer! If I was in the mIRC subject, I would type /Y11. If your in Round 2 , mIRC Subject, you'd type Y12! 2REMEBER:3SUBJECT, then2NUMBER, then4ROUND number!3 Remeber that and you'll be fine! :)  
  578. n576=/x {
  579. n577=  /speak Good Choice! You have entered the ever script trivia. | /echo 3 -a Type /x and the number to choose an answer. For an example, type /ae... The Question is...
  580. n578=  /.timer 1 3 echo 4 -a In what version of Ever Script did I add Fake Echo Conversations? The options will appear soon...
  581. n579=  /.timer 1 3 speak In what version of Ever Script did I add Fake Eko Conversations! 
  582. n580=  /.timer 1 10 echo 2 -a Type /x11, if you think the answer is number 1. In round 2, you'll type /x12 if you think the answer is 1.  Was it: 1) Version 2.1,  2) Version 2.7, or 3) Version 2.5  
  583. n581=  /.timer 1 10 speak Remember, at any time you can type slash A e for an example. 
  584. n582=}
  585. n583=/x21 /speak Correct! | /echo 3 -a Yes!! That is correct! I added Fake Echo Conversations in version 2.7!!!!! You now have %me point(s)! Type /x2 to continue. to go on. | /inc %me 1 
  586. n584=/x11 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  587. n585=/x31 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  588. n586=/x2 {
  589. n587=  /.timer 1 4 echo 4 -a ROUND 2!!! | /.timer 1 7 echo 3 -a  Q: What was the major bug found in version 3.0? HINT: Something to do with channel control. | /.timer 1 7 speak What was the major bug found in version 3.0! 
  590. n588=  /.timer 1 10 echo 4 -a Was it: 1)  An Opnotice bug, 2) A Deop Bug, or 3) a ban bug.
  591. n589=}
  592. n590=/x12 /echo 3 -a %ix
  593. n591=/x22 /echo 3 -a %ix
  594. n592=/x32 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me point(s)! Type /x3 to continue!
  595. n593=/x3 {
  596. n594=  /.timer 1 4 echo 4 -a ROUND 3!!! | /.timer 1 7 echo 3 -a  Q: Was there a version 1.2 of ever script? | /.timer 1 7 speak Was there a version 1.2 of ever script?
  597. n595=  /.timer 1 10 echo 4 -a 1)  Yes 2) This is 1.2 or 3) no
  598. n596=}
  599. n597=/x13 /echo 3 -a %ix
  600. n598=/x23 /echo 3 -a %ix
  601. n599=/x33 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me point(s)! You may type /hard for the HARDEST one!!! 4You will still win if you dont...2 but you'll get bonus points if you do!4 :) You now have %me points!! Type /con to carry these points to another subject.3 Type /non or not carry them to another subject! 4OR type /st to QUIT! :)
  602. n600=/hard {
  603. n601=  /speak okay, you asked for it! hehehehehehehehe!! What was Ever Script's previous name? | /echo 3 -a What was Ever Script's former name?
  604. n602=  /.timer 1 4 echo 3 -a This time, type /xb1 if you think it's 1, type /xb2 if it's 2, etc...  Was it: 1) Ever Learner 2) Script Learner 3) None of these! 
  605. n603=}
  606. n604=/xb1 /echo 3 -a %ix
  607. n605=/xb2 /echo 3 -a WOW!! You got it!!! The former name was: Script Leaner! | /inc %me 5 | /echo 3 -a You get 5 bonus points! You now have %me points!! Type /con to carry these points to another subject. Type /non or not carry them to another subject! OR type /st to QUIT! :)
  608. n606=/xb3 /echo 3 -a %ix
  609. n607=/con /echo 3 -a Cool, that means you'd like to continue playing my Trivia game! :) Your points will NOT be cleared!! You can safely type /trivia and choose another subject, dont worry, your points will follow you. :)
  610. n608=/non /echo 3 -a Ok, you points shall be cleared. :) | /set %me 0
  611. n609=/st /echo 3 -a Stop? Ok, come back now... :) | /speak Good-Bye! Play Trivia again some time!
  612. n610=/y {
  613. n611=  /speak Good Choice! You have entered the M IRC trivia. | /echo 3 -a Type /y and the number to choose an answer. For an example, type /ae... The Question is...
  614. n612=  /.timer 1 3 echo 4 -a What version was the first public release of mIRC?
  615. n613=  /.timer 1 3 speak What version was the first public release of M IRC?
  616. n614=  /.timer 1 10 echo 2 -a Type /y11, if you think the answer is number 1. In round 2, you'll type /y12 if you think the answer is 1.  Was it: 1) Version 2.1,  2) Version 3.1, or 3) Version 1.0  
  617. n615=}
  618. n616=/y11 /speak Correct! | /echo 3 -a Yes!! That is correct! You now have %me point(s)! Type /y2 to continue! | /inc %me 1 
  619. n617=/y21 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  620. n618=/y31 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  621. n619=/y2 {
  622. n620=  /.timer 1 4 echo 4 -a ROUND 2!!! | /.timer 1 7 echo 3 -a  Q: Which Of these versions did Khaled NOT release or make of mIRC?  
  623. n621=  /.timer 1 10 echo 4 -a 1) 3.9  , 2) 4.0 or 3) 1.0
  624. n622=}
  625. n623=/y12 /echo 3 -a %ix
  626. n624=/y22 /echo 3 -a %ix
  627. n625=/y32 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me point(s)! Type /y3 to continue!
  628. n626=/y3 {
  629. n627=  /.timer 1 4 echo 4 -a ROUND 3!!! | /.timer 1 7 echo 3 -a  Q: When was mIRC version 4.1 released? | /.timer 1 7 speak When was M IRC version 4.1 released? 
  630. n628=  /.timer 1 10 echo 4 -a Was it: 1) September 3rd, 1996 2) April 27th, 1996 or 3) June 6th, 1996 
  631. n629=}
  632. n630=/y13 /echo 3 -a %ix
  633. n631=/y33 /echo 3 -a %ix
  634. n632=/y23 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me points!! Type /con to carry these points to another subject. Type /non or not carry them to another subject! OR type /st to QUIT! :)
  635. n633=/z {
  636. n634=  /speak Good Choice! You have entered the M IRC Scripts channel trivia on dalnet. | /echo 3 -a Type /z and the number to choose an answer. For an example, type /ae... The Question is...
  637. n635=  /.timer 1 3 echo 4 -a Who is the founder of #mIRC_Scripts on DALnet?
  638. n636=  /.timer 1 3 speak Whose the founder of #M IRC Scripts on dalnet?
  639. n637=  /.timer 1 10 echo 2 -a Type /z11, if you think the answer is number 1. In round 2, you'll type /z12 if you think the answer is 1.  Is it: 1) Cheesi  2) Toolman or 3) Fugy  
  640. n638=}
  641. n639=/z21 /speak Correct! | /echo 3 -a Yes!! That is correct! You now have %me point(s)! Type /z2 to continue! | /inc %me 1 
  642. n640=/z11 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  643. n641=/z31 /echo 3 -a I am sorry, that is incorrect... Type /trivia or type /x now! :)
  644. n642=/z2 {
  645. n643=  /.timer 1 4 echo 4 -a ROUND 2!!! | /.timer 1 7 echo 3 -a  Q: When was #mIRC_Scripts on DALnet created?  
  646. n644=  /.timer 1 10 echo 4 -a 1) Tuesday, Oct 29th, '96  , 2) Wed., Oct. 29th '96 or 3) Thurs., Oct 19th, '95.
  647. n645=}
  648. n646=/z32 /echo 3 -a %ix
  649. n647=/z22 /echo 3 -a %ix
  650. n648=/z12 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me point(s)! Type /z3 to continue!
  651. n649=/z3 {
  652. n650=  /.timer 1 4 echo 4 -a ROUND 3!!! | /.timer 1 7 echo 3 -a  Q: Does #mIRC_Scripts have over 50 Aops in March '97? 
  653. n651=  /.timer 1 10 echo 4 -a Is it: 1) Yes 2) No or 3) Exactly 50 
  654. n652=}
  655. n653=/z13 /echo 3 -a %ix
  656. n654=/z33 /echo 3 -a %ix
  657. n655=/z23 /inc %me 1 | /echo 3 -a Yes!! That is correct! You now have %me points!! Type /con to carry these points to another subject. Type /non or not carry them to another subject! OR type /st to QUIT! :)
  658.